home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / tcl / tkstep0.3b3 / tkstep0 / tkstep / tkMenubutton.c.diff < prev    next >
Encoding:
Text File  |  1996-07-08  |  1.3 KB  |  45 lines
  1. --- ../tk4.1/generic/tkMenubutton.c    Fri Feb 16 22:32:09 1996
  2. +++ tkMenubutton.c    Mon Jul  8 19:24:12 1996
  3. @@ -12,7 +12,10 @@
  4.   *
  5.   * SCCS: @(#) tkMenubutton.c 1.77 96/02/15 18:52:22
  6.   */
  7. -
  8. +/*
  9. + * TkSTEP modifications Copyright
  10. + * by Alfredo K. Kojima 
  11. + */ 
  12.  #include "tkPort.h"
  13.  #include "default.h"
  14.  #include "tkInt.h"
  15. @@ -167,8 +170,8 @@
  16.   * these options are 1/10 millimeters.
  17.   */
  18.  
  19. -#define INDICATOR_WIDTH        40
  20. -#define INDICATOR_HEIGHT    17
  21. +#define INDICATOR_WIDTH        35
  22. +#define INDICATOR_HEIGHT    22
  23.  
  24.  /*
  25.   * Information used for parsing configuration specs:
  26. @@ -909,10 +912,17 @@
  27.      if (borderWidth < 1) {
  28.          borderWidth = 1;
  29.      }
  30. +    XFillRectangle(mbPtr->display, pixmap, 
  31. +        Tk_3DBorderGC(tkwin, border, TK_3D_DARK_GC),
  32. +        Tk_Width(tkwin) - mbPtr->inset - mbPtr->indicatorWidth
  33. +            + mbPtr->indicatorHeight + 2,
  34. +        y + ((int) (height - mbPtr->indicatorHeight))/2,
  35. +        mbPtr->indicatorWidth - 2*mbPtr->indicatorHeight,
  36. +        mbPtr->indicatorHeight);
  37.      Tk_Fill3DRectangle(tkwin, pixmap, border,
  38.          Tk_Width(tkwin) - mbPtr->inset - mbPtr->indicatorWidth
  39.              + mbPtr->indicatorHeight,
  40. -        y + ((int) (height - mbPtr->indicatorHeight))/2,
  41. +        y + ((int) (height - mbPtr->indicatorHeight))/2 - 2,
  42.          mbPtr->indicatorWidth - 2*mbPtr->indicatorHeight,
  43.          mbPtr->indicatorHeight, borderWidth, TK_RELIEF_RAISED);
  44.      }
  45.